home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 December / Chip_2003-12_cd1.bin / program / ctenari / ShiCola / CodePad37.exe / $INSTDIR / Syntax Definitions / clipper.def < prev    next >
Encoding:
Text File  |  2003-10-17  |  5.3 KB  |  213 lines
  1. object TPersHolder
  2.   P.Name = 'Clipper'
  3.   P.Extensions.Strings = (
  4.     'Clipper files (*.prg)|*.prg')
  5.   P.SyntaxBlocks = <
  6.     item
  7.       Name = 'Default'
  8.       ID = 0
  9.       UseMetaSymbol = True
  10.       UseMetaToWrapLines = True
  11.       MetaSymbol = ';'
  12.       FIText = 0
  13.       FIIntNum = 1
  14.       FIFloatNum = 2
  15.       FIHexNum = 3
  16.       FIDirective = 4
  17.       FISymbol = 10
  18.       UseSymbols = True
  19.       UseLineDirectives = True
  20.       UseComments = True
  21.       UseSingleLineComments = True
  22.       UseMultiLineComments = True
  23.       UseFullLineComments = True
  24.       UseStrings = True
  25.       UseSingleLineStrings = True
  26.       UseNumbers = True
  27.       UsePrefixedSuffixedIdentifiers = True
  28.       UseKeywords = True
  29.       BlockDelimiters = <>
  30.       LineDirectivePrefix = '#'
  31.       SingleLineCommentDelimiters = <
  32.         item
  33.           FontID = 5
  34.           LeftDelimiter = '//'
  35.         end
  36.         item
  37.           FontID = 15
  38.           LeftDelimiter = '&&'
  39.         end>
  40.       MultiLineCommentDelimiters = <
  41.         item
  42.           FontID = 6
  43.           LeftDelimiter = '/*'
  44.           RightDelimiter = '*/'
  45.         end>
  46.       FullLineCommentDelimiters = <
  47.         item
  48.           FontID = 7
  49.           LeftDelimiter = '*'
  50.         end
  51.         item
  52.           FontID = 16
  53.           LeftDelimiter = 'note'
  54.         end>
  55.       SingleLineStringDelimiters = <
  56.         item
  57.           FontID = 8
  58.           LeftDelimiter = #39
  59.           RightDelimiter = #39
  60.         end
  61.         item
  62.           FontID = 9
  63.           LeftDelimiter = '"'
  64.           RightDelimiter = '"'
  65.         end>
  66.       IdentPrefixesSuffixes = <
  67.         item
  68.           LeftDelimiter = '.'
  69.           RightDelimiter = '.'
  70.         end>
  71.       KeywordSets = <
  72.         item
  73.           FontID = 14
  74.           Name = 'reserved'
  75.           Keywords = 
  76.             '.and.,.f.,.not.,.or.,.t.,announce,begin,break,case,class,continu' +
  77.             'e,declare,do,else,elseif,end,endcase,endclass,enddo,endif,endseq' +
  78.             'uence,exit,exported,field,for,function,hidden,if,in,init,local,m' +
  79.             'emvar,method,next,nil,note,otherwise,parameters,private,procedur' +
  80.             'e,protected,public,recover,request,return,self,sequence,static,s' +
  81.             'tep,then,to,using,var,while'
  82.         end>
  83.     end>
  84.   P.FontTable = <
  85.     item
  86.       FontID = 0
  87.       GlobalAttrID = 'Whitespace'
  88.       Font.Charset = DEFAULT_CHARSET
  89.       Font.Color = clBlack
  90.       Font.Height = -13
  91.       Font.Name = 'Courier New'
  92.       Font.Style = []
  93.     end
  94.     item
  95.       FontID = 1
  96.       GlobalAttrID = 'Integer'
  97.       Font.Charset = DEFAULT_CHARSET
  98.       Font.Color = clGreen
  99.       Font.Height = -13
  100.       Font.Name = 'Courier New'
  101.       Font.Style = []
  102.     end
  103.     item
  104.       FontID = 2
  105.       GlobalAttrID = 'Float'
  106.       Font.Charset = DEFAULT_CHARSET
  107.       Font.Color = clGreen
  108.       Font.Height = -13
  109.       Font.Name = 'Courier New'
  110.       Font.Style = []
  111.     end
  112.     item
  113.       FontID = 3
  114.       GlobalAttrID = 'Integer'
  115.       Font.Charset = DEFAULT_CHARSET
  116.       Font.Color = clGreen
  117.       Font.Height = -13
  118.       Font.Name = 'Courier New'
  119.       Font.Style = []
  120.     end
  121.     item
  122.       FontID = 4
  123.       GlobalAttrID = 'Defines'
  124.       Font.Charset = DEFAULT_CHARSET
  125.       Font.Color = clGreen
  126.       Font.Height = -13
  127.       Font.Name = 'Courier New'
  128.       Font.Style = [fsBold]
  129.     end
  130.     item
  131.       FontID = 5
  132.       GlobalAttrID = 'Comment'
  133.       Font.Charset = DEFAULT_CHARSET
  134.       Font.Color = clGray
  135.       Font.Height = -13
  136.       Font.Name = 'Courier New'
  137.       Font.Style = [fsItalic]
  138.     end
  139.     item
  140.       FontID = 6
  141.       GlobalAttrID = 'Comment'
  142.       Font.Charset = DEFAULT_CHARSET
  143.       Font.Color = clGray
  144.       Font.Height = -13
  145.       Font.Name = 'Courier New'
  146.       Font.Style = [fsItalic]
  147.     end
  148.     item
  149.       FontID = 7
  150.       GlobalAttrID = 'Comment'
  151.       Font.Charset = DEFAULT_CHARSET
  152.       Font.Color = clGray
  153.       Font.Height = -13
  154.       Font.Name = 'Courier New'
  155.       Font.Style = [fsItalic]
  156.     end
  157.     item
  158.       FontID = 8
  159.       GlobalAttrID = 'String'
  160.       Font.Charset = DEFAULT_CHARSET
  161.       Font.Color = clMaroon
  162.       Font.Height = -13
  163.       Font.Name = 'Courier New'
  164.       Font.Style = []
  165.     end
  166.     item
  167.       FontID = 9
  168.       GlobalAttrID = 'String'
  169.       Font.Charset = DEFAULT_CHARSET
  170.       Font.Color = clMaroon
  171.       Font.Height = -13
  172.       Font.Name = 'Courier New'
  173.       Font.Style = []
  174.     end
  175.     item
  176.       FontID = 14
  177.       GlobalAttrID = 'Reserved words'
  178.       Font.Charset = DEFAULT_CHARSET
  179.       Font.Color = clBlue
  180.       Font.Height = -13
  181.       Font.Name = 'Courier New'
  182.       Font.Style = [fsBold]
  183.     end
  184.     item
  185.       FontID = 15
  186.       GlobalAttrID = 'Comment'
  187.       Font.Charset = DEFAULT_CHARSET
  188.       Font.Color = clGray
  189.       Font.Height = -13
  190.       Font.Name = 'Courier New'
  191.       Font.Style = [fsItalic]
  192.     end
  193.     item
  194.       FontID = 16
  195.       GlobalAttrID = 'Comment'
  196.       Font.Charset = DEFAULT_CHARSET
  197.       Font.Color = clGray
  198.       Font.Height = -13
  199.       Font.Name = 'Courier New'
  200.       Font.Style = [fsItalic]
  201.     end
  202.     item
  203.       FontID = 10
  204.       GlobalAttrID = 'Delimiters'
  205.       Font.Charset = DEFAULT_CHARSET
  206.       Font.Color = clBlack
  207.       Font.Height = -13
  208.       Font.Name = 'Courier New'
  209.       Font.Style = []
  210.     end>
  211.   P.SyntaxVersion = 3
  212. end
  213.